home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er
/
64ER_CD.iso
/
92xx
/
9204a.d64
/
c-f (comp).seq
< prev
next >
Wrap
Text File
|
1995-03-30
|
1KB
|
42 lines
;SPEEDER COMPUTER->FLOPPY (COMP.ROUTINE)
LDA #$0B ;ATTENTION IN CIA 2
STA $DD00 ;SETZEN
LDX #$03 ;AUF DATA-LEITUNG
L1 LDA $DD00 ;WARTEN
BPL L1 ;
STX $DD00 ;ATN RUECKSETZEN
L2 LDA PUFFER,Y;DATENBYTES HOLEN
LDX #$0B ;ATN
STX $DD00 ;SETZEN
TAX ;BYTE RETTEN
AND #$F0 ;DATENBITS 4 UND 5
STA $DD00 ;ISOLIEREN & UEBERTRAGEN
LSR A ;RECHTS ROTIEREN
LSR A ;
AND #$F0 ;UND BITS 6 UND 7
STA $DD00 ;UEBERTRAGEN
TXA ;GERETTER WERT IN AKKU
AND #$0F ;AUS LOWNIBBLE BITS
TAX ;0 UND 1 ISOLIEREN
LDA TAB,X ;WERT AUS TABELLE LADEN
STA $DD00 ;UND UEBERTRAGEN
LSR A ;WIEDER
LSR A ;RECHTS ROTIEREN
AND #$F0 ;UND BITS 2 UND 3
STA $DD00 ;UEBERTRAGEN
NOP ;ZYKLEN
NOP ;AUSGLEICH
NOP ;
INY ;NAECHSTES BYTE
BNE L2 ;
LDA #$03 ;ATN
STA $DD00 ;ZURUECKSETZEN
RTS ;UND RUECKKEHR
TAB .BYTE $00,$10,$20,$30
.BYTE $40,$50,$60,$70
.BYTE $80,$90,$A0,$B0
.BYTE $C0,$D0,$E0,$F0